home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / gmplaygui / gui / theend < prev    next >
Text File  |  1997-06-14  |  1KB  |  65 lines

  1. resident eval remove
  2.  
  3.  
  4. if exists env:gmpid
  5.     unsetenv gm
  6.     break $gmpid
  7.     echo >settings/freq "$freq"
  8.     echo >settings/midi "$midi"
  9.     echo >settings/gmpri "$gmpri"
  10.     echo >settings/gmopt "$gmopt"
  11.     echo >settings/bpbackground $bpbackground
  12.     echo >settings/bpbuttons $bpbuttons
  13.     echo >settings/bpx "$bpx"
  14.     echo >settings/bpy "$bpy"
  15.     echo >settings/bpix "$bpix"
  16.     echo >settings/bpiy "$bpiy"
  17.     echo >settings/bpfont "$bpfont"
  18.     echo >settings/gmi "$gmi"
  19.     echo >settings/gmunp "$gmunp"
  20.     echo >settings/gmst "$gmst"
  21.     echo >settings/gmdf "$gmdf"
  22.     echo >settings/gmtf "$gmtf"
  23.  
  24. endif
  25.  
  26. unsetenv gmunp
  27. unsetenv freq
  28. unsetenv midi
  29. unsetenv gmpid
  30. unsetenv gmpri
  31. unsetenv gmopt
  32. unsetenv bpy
  33. unsetenv bpx
  34. unsetenv bpix
  35. unsetenv bpiy
  36.  
  37. unsetenv infoon
  38. unsetenv short
  39. unsetenv gmc
  40. unsetenv gmi
  41. unsetenv gma
  42. unsetenv gmm
  43.  
  44. unsetenv gmpl
  45. unsetenv gmplb
  46. unsetenv gmant
  47. unsetenv gmch
  48. unsetenv gmdisp
  49.  
  50. unsetenv gmii
  51. unsetenv alloc
  52.  
  53. unsetenv gmst
  54. unsetenv gmdf
  55. unsetenv gmtf
  56.  
  57. delete >nil: t:gm t:alloc
  58.  
  59. wait 4
  60. if exists env:gmres
  61.     unsetenv gmres
  62.     resident selector remove
  63. endif
  64.  
  65. assign >nil: gmd: remove